home *** CD-ROM | disk | FTP | other *** search
- .key ""
- .bra {
- .ket }
- echo "Hard Disk Format"
- assign >NIL: WB_2.x: exists
- if warn
- echo "*NWARNING: Hard disk drive partition WB_2.x: cannot be found!"
- echo "This script formats partitions WB_2.x: and Work:."
- echo "Make sure the drive is properly connected and prepped, and"
- echo "the partitions have the correct names."
- skip exit
- endif
- ;
- echo "*NWARNING: This will reformat drive partitions WB_2.x: and Work:."
- echo "All information on these partitions will be lost!"
- ask "Are you sure you want to continue ? (Y/N) "
- if not warn
- echo "Format cancelled."
- skip exit
- endif
- ;
- path sys:system add
- echo "*NFormatting..."
- format <NIL: >NIL: drive WB_2.x: name System2.0 quick
- if fail
- skip failcase
- endif
- format <NIL: >NIL: drive Work: name Work quick
- lab failcase
- if fail
- echo "Format failed."
- skip exit
- endif
- ;
- echo "*NHard disk format is complete."
- ask "*NWould you like the system software to be*Ninstalled on your hard disk ? (Y/N) "
- if warn
- execute :InstallHD
- endif
- lab exit
-